home *** CD-ROM | disk | FTP | other *** search
/ Quake Busters / QUAKE.bin / pc / shared.dir / 00856_Script_(Bt) down on back-skip -2 < prev    next >
Text File  |  1996-06-10  |  775b  |  33 lines
  1. -- skip 2 markers back on mouseup
  2.  
  3.  
  4.  
  5. on mouseDown
  6.   puppetSound "Mouse Down"
  7.   updateStage
  8.   set the castNum of sprite 47 to the ¼
  9. number of cast "back long down"
  10.   updateStage
  11.   repeat while the stilldown
  12.     if not rollover(the clickOn) then ¼
  13. set the castnum of sprite the clickOn to ¼
  14. the number of cast "back long"
  15.     updateStage
  16.     if rollover(the clickOn) then nothing
  17.   end repeat
  18.   puppetSound 0
  19. end mouseDown
  20.  
  21. on mouseUp
  22.   set the castNum of sprite 47 to the ¼
  23. number of cast "back long"
  24.   if rollover(47) then puppetSound "Mouse Up"
  25.   updateStage
  26.   repeat while soundBusy(1)
  27.     nothing
  28.   end repeat
  29.   puppetSound 0
  30.   updateStage
  31.   if rollover(47) then go to marker (-2)
  32.   if not rollover(47) then go to the frame -2
  33. end mouseUp